home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Franz PD / Franz PD Disk #334 (1994-06)(Rhein-Sieg-Soft).zip / Franz PD Disk #334 (1994-06)(Rhein-Sieg-Soft).adf / tracker.library / tracker.i < prev    next >
Text File  |  1994-06-11  |  10KB  |  232 lines
  1.         IFND    LIBRARIES_TRACKER_I
  2. LIBRARIES_TRACKER_I: SET 1
  3.  
  4. **
  5. **      Filename: libraries/tracker.i
  6. **      Revision: 6.8
  7. **      Date: 93/06/11
  8. **
  9. **      Definitions for use when using tracker.library
  10. **
  11. **      (C) Arnold Schommer
  12. **          Erikaweg 16
  13. **          40670 Meerbusch-Strümp, Germany
  14. **
  15.  
  16.         IFND    EXEC_TYPES_I
  17.         INCLUDE "exec/types.i"
  18.         ENDC
  19.         IFND    EXEC_LIBRARIES_I
  20.         INCLUDE "exec/libraries.i"
  21.         ENDC
  22.         IFND    EXEC_ALERTS
  23.         INCLUDE "exec/alerts.i"
  24.         ENDC
  25.  
  26. TRACKERNAME:    MACRO
  27.                 DC.B "tracker.library",0
  28.                 ENDM
  29.  
  30. CALLTRK: MACRO
  31.         move.l  _TrackerBase,a6
  32.         jsr     \1(a6)
  33.         ENDM
  34.  
  35. TRK_OPENLIB: MACRO
  36.         lea     \1,a1
  37.         IFC     '\2',''
  38.         moveq   #0,d0
  39.         ENDC
  40.         IFNC    '\2',''
  41.         moveq   #\2,d0
  42.         ENDC
  43.         CALLTRK TRK_OpenLibrary
  44.         ENDM
  45. TRK_OPENSTDLIB: MACRO
  46.         move.l  #STDLIB_\1,d1
  47.         IFC     '\2',''
  48.         moveq   #0,d0
  49.         ENDC
  50.         IFNC    '\2',''
  51.         moveq   #\2,d0
  52.         ENDC
  53.         CALLTRK TRK_OpenStdLibrary
  54.         ENDM
  55.  
  56.  LIBINIT
  57.  LIBDEF _LVOTRK_OpenLibrary         ; (a1=name,d0=version)
  58.  LIBDEF _LVOTRK_OpenStdLibrary      ; (d1=number,d0=version)
  59.  LIBDEF _LVOTRK_CloseLibrary        ; (a1=library)
  60.  LIBDEF _LVOTRK_AllocMem            ; (d0=bytes,d1=type)
  61.  LIBDEF _LVOTRK_FreeMem             ; (a1=memory)
  62.  LIBDEF _LVOTRK_OpenDevice          ; (a0=name,d0=unit,a1=IORequest,d1=flags)
  63.  LIBDEF _LVOTRK_CloseDevice         ; (a1=IORequest)
  64.  LIBDEF _LVOTRK_CreatePort          ; (a0=name,d0=priority)
  65.  LIBDEF _LVOTRK_DeletePort          ; (a0=port)
  66.  LIBDEF _LVOTRK_CreateExtIO         ; (a0=ReplyPort,d0.w=size)
  67.  LIBDEF _LVOTRK_DeleteExtIO         ; (a0=IORequest)
  68.  LIBDEF _LVOTRK_GetWBMsg            ; ()
  69.  LIBDEF _LVOTRK_AllocSignal         ; (d0=number)
  70.  LIBDEF _LVOTRK_FreeSignal          ; (d0=number)
  71.  LIBDEF _LVOTRK_Open                ; (d1=name,d2=mode)
  72.  LIBDEF _LVOTRK_OpenFromLock        ; (d1=lock)
  73.  LIBDEF _LVOTRK_Close               ; (d1=fh)
  74.  LIBDEF _LVOTRK_Lock                ; (d1=name,d2=mode)
  75.  LIBDEF _LVOTRK_DupLock             ; (d1=lock)
  76.  LIBDEF _LVOTRK_DupLockFromFH       ; (d1=fh)
  77.  LIBDEF _LVOTRK_UnLock              ; (d1=lock)
  78.  LIBDEF _LVOTRK_Examine             ; (d1=lock)
  79.  LIBDEF _LVOTRK_ExamineFH           ; (d1=fh)
  80.  LIBDEF _LVOTRK_ExamineName         ; (d1=name)
  81.  LIBDEF _LVOTRK_ExNext              ; (d2=fib)
  82.  LIBDEF _LVOTRK_FreeFIB             ; (d1=fib)
  83.  LIBDEF _LVOTRK_Info                ; (d1=lock)
  84.  LIBDEF _LVOTRK_InfoName            ; (d1=name)
  85.  LIBDEF _LVOTRK_LoadSeg             ; (d1=name)
  86.  LIBDEF _LVOTRK_NewLoadSeg          ; (d1=name,d2=tags)
  87.  LIBDEF _LVOTRK_UnLoadSeg           ; (d1=seglist)
  88.  LIBDEF _LVOTRK_AllocDosObject      ; (d1=type,d2=tags)
  89.  LIBDEF _LVOTRK_FreeDosObject       ; (d2=dosobj)
  90.  LIBDEF _LVOTRK_StartNotify         ; (d1=notifyrequest)
  91.  LIBDEF _LVOTRK_EndNotify           ; (d1=notifyrequest)
  92.  LIBDEF _LVOTRK_OpenFont            ; (a0=textattr)
  93.  LIBDEF _LVOTRK_OpenDiskFont        ; (a0=textattr)
  94.  LIBDEF _LVOTRK_CloseFont           ; (a1=textfont)
  95.  LIBDEF _LVOTRK_AllocRaster         ; (d0=width,d1=height)
  96.  LIBDEF _LVOTRK_FreeRaster          ; (a0=raster)
  97.  LIBDEF _LVOTRK_GetSprite           ; (a0=sprite,d0=num)
  98.  LIBDEF _LVOTRK_FreeSprite          ; (d0=num)
  99.  LIBDEF _LVOTRK_OpenWindow          ; (a0=newwindow)
  100.  LIBDEF _LVOTRK_OpenWindowTagList   ; (a0=newwindow,a1=tags)
  101.  LIBDEF _LVOTRK_OpenWdOnPubScreen   ; (a0=newwindow,a2=pubscreen)
  102.  LIBDEF _LVOTRK_OpenWdOnPSTagList   ; (a0=newwindow,a1=tags,a2=pubscreen)
  103.  LIBDEF _LVOTRK_CloseWindow         ; (a0=window)
  104.  LIBDEF _LVOTRK_OpenScreen          ; (a0=newscreen)
  105.  LIBDEF _LVOTRK_OpenScreenTagList   ; (a0=newscreen,a1=tags)
  106.  LIBDEF _LVOTRK_CloseScreen         ; (a0=screen)
  107.  LIBDEF _LVOTRK_SetMenuStrip        ; (a0=window,a1=menu)
  108.  LIBDEF _LVOTRK_ClearMenuStrip      ; (a0=window)
  109.  LIBDEF _LVOTRK_ResetMenuStrip      ; (a0=window,a1=menu)
  110.  LIBDEF _LVOTRK_Request             ; (a0=requester,a1=window)
  111.  LIBDEF _LVOTRK_EndRequest          ; (a0=requester)
  112.  LIBDEF _LVOTRK_SetDMRequest        ; (a0=window,a1=requester)
  113.  LIBDEF _LVOTRK_ClearDMRequest      ; (a0=window)
  114.  LIBDEF _LVOTRK_BuildSysRequest     ; (a0=window,a1=bodytext,a2=postext,
  115.                                     ;  a3=negtext,d0=idcmp,d2=width,d3=height)
  116.  LIBDEF _LVOTRK_FreeSysRequest      ; (a0=window)
  117.  LIBDEF _LVOTRK_GetPrefs            ; (d0=size)
  118.  LIBDEF _LVOTRK_GetDefPrefs         ; (d0=size)
  119.  LIBDEF _LVOTRK_SetPrefs            ; (a0=prefs,d1=flag,d2=freeflag)
  120.  LIBDEF _LVOTRK_FreePrefs           ; (a0=prefs)
  121.  LIBDEF _LVOTRK_LockPubScreen       ; (a0=name)
  122.  LIBDEF _LVOTRK_UnlockPubScreen     ; (a1=screen)
  123.  LIBDEF _LVOTRK_GetScreenDrawInfo   ; (a0=screen)
  124.  LIBDEF _LVOTRK_GetScDIPubScreen    ; (a0=psname)
  125.  LIBSKIP 1
  126.  LIBDEF _LVOTRK_FreeScreenDrawInfo  ; (a1=drawinfo)
  127.  LIBDEF _LVOTRK_AddIntServer        ; (d0=intnum,a1=interrupt)
  128.  LIBDEF _LVOTRK_RemIntServer        ; (a1=interrupt)
  129.  LIBDEF _LVOTRK_AllocAslRequest     ; (d0=type,a0=ptags)
  130.  LIBDEF _LVOTRK_FreeAslRequest      ; (a0=request)
  131.  LIBDEF _LVOTRK_AllocFileRequest    ; ()
  132. _LVOTRK_FreeFileRequest:        equ _LVOTRK_FreeAslRequest
  133.  LIBDEF _LVOTRK_AslRequest          ; (d0=type,a1=ptags)
  134. _LVOTRK_FreeRequest:            equ _LVOTRK_FreeAslRequest
  135.  LIBDEF _LVOTRK_ReadArgs            ; (d1=template, d2=argarray, d3=rdargs)
  136.  LIBDEF _LVOTRK_FreeArgs            ; (d1=rdargs)
  137.  LIBDEF _LVOTRK_GetVisualInfoA      ; (a0=screen, a1=taglist)
  138.  LIBDEF _LVOTRK_GetVIPubScreenA     ; (a0=psname, a1=taglist)
  139.  LIBDEF _LVOTRK_FreeVisualInfoA     ; (a0=vi)
  140.  LIBDEF _LVOTRK_CreateContext       ; (a0=glistptr)
  141.  LIBDEF _LVOTRK_FreeGadgets         ; (a0=glist)
  142.  LIBDEF _LVOTRK_CreateMenusA        ; (a0=newmenu, a1=taglist)
  143.  LIBDEF _LVOTRK_FreeMenus           ; (a0=menu)
  144.  
  145.  LIBDEF _LVOSetTrackingLevel        ; (d0=newlevel)
  146.  LIBDEF _LVOGetTrackingLevel        ; ()
  147.  LIBDEF _LVOFreeTrackingLevel       ; (d0=level)
  148.  LIBDEF _LVOFreeTrackingLevels      ; (d0=minlevel)
  149.  LIBDEF _LVOFreeCurrentTrackingLevel; ()
  150.  LIBDEF _LVOFreeUpperTrackingLevels ; ()
  151.  LIBDEF _LVOPushTrackingLevel       ; ()
  152. _LVOIncTrackingLevel:   EQU _LVOPushTrackingLevel
  153.  LIBDEF _LVOPopTrackingLevel        ; ()
  154.  LIBDEF _LVOPopTrackingLevels       ; ()
  155.  LIBDEF _LVODecTrackingLevel        ; ()
  156.  LIBDEF _LVOHighestTrackingLevel    ; ()
  157.  LIBDEF _LVONewTrackingLevel        ; ()
  158.  
  159.  LIBDEF _LVOTRK_AllocIFF                ; ()
  160.  LIBDEF _LVOTRK_FreeIFF                 ; (a0=iffhandle)
  161.  LIBDEF _LVOTRK_OpenIFF                 ; (a0=iffhandle, d0=rwmode)
  162.  LIBDEF _LVOTRK_CloseIFF                ; (a0=iffhandle)
  163.  LIBDEF _LVOTRK_PushChunk               ; (a0=iffhandle, d0=type, d1=id,
  164.                                         ;       d2=size)
  165.  LIBDEF _LVOTRK_PopChunk                ; (a0=iffhandle)
  166.  LIBDEF _LVOTRK_OpenClipboard           ; (d0=unit)
  167.  LIBDEF _LVOTRK_CloseClipboard          ; (a0=clipboardhandle)
  168.  LIBDEF _LVOTRK_AllocLocalItem          ; (d0=type, d1=id, d2=ident,
  169.                                         ;  d3=usize)
  170.  LIBDEF _LVOTRK_FreeLocalItem           ; (a0=LocalContextItem)
  171.  LIBDEF _LVOTRK_CreateIFFasDOS          ; (d0=rwmode, a0=filename, d1=mode)
  172.  LIBDEF _LVOTRK_DeleteDOSIFF            ; (a0=iffhandle)
  173.  LIBDEF _LVOTRK_CreateIFFasClip         ; (d0=rwmode, d1=unit)
  174.  LIBDEF _LVOTRK_DeleteClipIFF           ; (a0=iffhandle)
  175.  
  176.  LIBDEF _LVOTRK_GetDevice               ; (a0=name,d0=unit,d1=flags,
  177.                                         ;  d2=ioreqsize)
  178.  
  179.  LIBDEF TRK_GetDiskObject               ; (a0=name)
  180.  LIBDEF TRK_GetDefDiskObject            ; (d0=type)
  181.  LIBDEF TRK_GetDiskObjectNew            ; (a0=name)
  182.  LIBDEF TRK_PutDiskObject               ; (a0=name, a1=diskobj)
  183.  LIBDEF TRK_PutDefDiskObject            ; (a0=diskobj)
  184.  LIBDEF TRK_FreeDiskObject              ; (a0=diskobj)
  185.  
  186. ; Schlüsselnummern für die Standard-Libraries bei TRK_OpenStdLibrary:
  187. STDLIB_ASL:                     EQU 0
  188. STDLIB_COMMODITIES:             EQU 4
  189. ;STDLIB_CX:                      EQU 8  ;gibt's garnicht !
  190. STDLIB_DISKFONT:                EQU 12
  191. STDLIB_DOS:                     EQU 16
  192. STDLIB_EXPANSION:               EQU 20
  193. STDLIB_GADTOOLS:                EQU 24
  194. STDLIB_GRAPHICS:                EQU 28
  195. STDLIB_ICON:                    EQU 32
  196. STDLIB_IFFPARSE:                EQU 36
  197. STDLIB_INFO                     EQU 40
  198. STDLIB_INTUITION:               EQU 44
  199. STDLIB_KEYMAP:                  EQU 48
  200. STDLIB_LAYERS:                  EQU 52
  201. STDLIB_MATHFFP:                 EQU 56
  202. STDLIB_MATHIEEEDOUBBAS:         EQU 60
  203. STDLIB_MATHIEEEDOUBTRANS:       EQU 64
  204. STDLIB_MATHIEEESINGBAS:         EQU 68
  205. STDLIB_MATHIEEESINGTRANS:       EQU 72
  206. STDLIB_MATHTRANS:               EQU 76
  207. STDLIB_REXXSUPPORT:             EQU 80
  208. STDLIB_REXXSYSLIB:              EQU 84
  209. STDLIB_TRANSLATOR:              EQU 88
  210. STDLIB_UTILITY:                 EQU 92
  211. STDLIB_VERSION                  EQU 96
  212. STDLIB_WORKBENCH:               EQU 100
  213. STDLIB_ARP:                     EQU 104
  214. STDLIB_REQ:                     EQU 108
  215. STDLIB_REQTOOLS:                EQU 112
  216.  
  217. ; Kennung für TrackerLib-Alerts:
  218. AN_TrackerLib:  EQU $0C000000
  219. ; Ein Task will auf die Library zugreifen, obwohl er sie nicht geöffnet hat:
  220. AN_Tracker_illegal_Task:        EQU AT_DeadEnd!AN_TrackerLib!$01
  221. ; Etwas soll freigegeben werden, ist aber garnicht registriert:
  222. AN_Tracker_double_free:         EQU AN_TrackerLib!$02
  223. ; Etwas von unbekanntem Typ soll freigegeben werden:
  224. AN_Tracker_illegal_Type:        EQU AT_DeadEnd!AN_TrackerLib!$03
  225. ; Unterlauf des TrackingLevels (in DecTrackingLevel):
  226. AN_Tracker_Level_underflow:     EQU AN_TrackerLib!$04
  227. ; Überlauf des TrackingLevels (in PushTrackingLevel):
  228. AN_Tracker_Level_overflow:      EQU AN_TrackerLib!$05
  229. ; Kein freier TrackingLevel gefunden (in NewTrackingLevel):
  230. AN_Tracker_Levels_full:         EQU AN_TrackerLib!$06
  231.  
  232.